home *** CD-ROM | disk | FTP | other *** search
/ cyber.net interactivo 3 / inter@ivo 1996-04.iso / cybint3 / bin / classica.dxr / 00067.ls < prev    next >
Encoding:
Text File  |  1996-03-21  |  311 b   |  24 lines
  1. on mouseUp
  2.   if rollOver(27) then
  3.     sound stop 2
  4.     go(1)
  5.   end if
  6.   if rollOver(28) then
  7.     sound stop 2
  8.     go("CD")
  9.   end if
  10. end
  11.  
  12. on exitFrame
  13.   global dir
  14.   if soundBusy(2) = 1 then
  15.     if dir = 1 then
  16.       go(the frame + 1)
  17.     else
  18.       go(the frame - 1)
  19.     end if
  20.   else
  21.     go("CD")
  22.   end if
  23. end
  24.